From 59f866ec4a7b597ffadd87d0f97852db06a99730 Mon Sep 17 00:00:00 2001 From: Roland Winkler Date: Thu, 3 Dec 2009 14:33:00 +0000 Subject: [PATCH] (proced-filter-alist): Use regexp-quote. --- lisp/proced.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/proced.el b/lisp/proced.el index fd3e4ab706e..00c55bd254a 100644 --- a/lisp/proced.el +++ b/lisp/proced.el @@ -265,8 +265,8 @@ It can also be a list of keys appearing in `proced-grammar-alist'." ;; FIXME: is there a better name for filter `user' that does not coincide ;; with an attribute key? (defcustom proced-filter-alist - `((user (user . ,(concat "\\`" (user-real-login-name) "\\'"))) - (user-running (user . ,(concat "\\`" (user-real-login-name) "\\'")) + `((user (user . ,(concat "\\`" (regexp-quote (user-real-login-name)) "\\'"))) + (user-running (user . ,(concat "\\`" (regexp-quote (user-real-login-name)) "\\'")) (state . "\\`[Rr]\\'")) (all) (all-running (state . "\\`[Rr]\\'")) -- 2.30.2